home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 7
/
BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso
/
Files
/
Hyper
/
K-L
/
LImacSTACK11⁄89.cpt
/
Using Repeat
/
card_4768.txt
< prev
next >
Wrap
Text File
|
1989-11-02
|
971b
|
45 lines
-- card: 4768 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 2687
-- name:
-- part contents for background part 8
----- text -----
repeat with <variable> = <low> to <high>
-- part contents for background part 24
----- text -----
put empty into msg
repeat with i = 1 to 6
put char i of fld "Title" after msg
end repeat
wait 120
put the number of this card into thisCard
repeat with i = 1 to thisCard
go card i
put the short name of this cd
end repeat
hide msg
-- part contents for background part 26
----- text -----
put empty into msg
repeat with i = 1 to 6
put char i of fld "Title" after msg
end repeat
wait 120
put the number of this card into thisCard
repeat with i = 1 to thisCard
go card i
put the short name of this cd
end repeat
hide msg
-- part contents for background part 30
----- text -----
Each time through the loop the variable is increased by 1 until it reaches the high number.
MOST COMMON REPEAT STRUCTURE!